*** APPENDIX TABLE 4 MODELS 3 AND 6 ***

* Note that Model 1 and Model 4 of Appendix Table 4 correspond to Model 4 and Model 6 of Table 1 in the paper

encode mun, gen(muni)

* Mixed models: Model 3 and Model 6
xi: xtmelogit benefdummy patriotflag patchavezstate08 chavezgov2008 opositor oppchavezstate08 misionfull lruralpop nbi abschavezmargin abschavezmargin_chavezstate08 chavezgov2008mais || muni: || centro:, laplace
est store ml1
xi: xtmelogit benefdummy patriotflag patchavezstate08 chavezgov2008 opositor oppchavezstate08 misionfull timeapp i.tipo_doc lruralpop nbi abschavezmargin abschavezmargin_chavezstate08 chavezgov2008mais || muni: || centro:, laplace
est store ml2

estout ml*, style(tex) starlevels(* .10 ** .05 *** .01) cells(b(star fmt(3)) se(par fmt(3))) mlabels("1: RE" "2: RE" "3: RE" "4: RE, Lag DV" "5: RE, Lag DV" "6: RE, Lag DV") keep(patriotflag patchavezstate08 chavezgov2008 opositor oppchavezstate08 misionfull timeapp lruralpop nbi _Itipo_doc_2 _Itipo_doc_3 _Itipo_doc_4 abschavezmargin abschavezmargin_chavezstate08) order(patchavezstate08 patriotflag oppchavezstate08 opositor misionfull timeapp _Itipo_doc_2 _Itipo_doc_3 _Itipo_doc_4 abschavezmargin_chavezstate08 abschavezmargin chavezgov2008 lruralpop nbi) varlabels(opositor "Opposition in Opposition State" patriotflag "Loyalist in Opposition State" patchavezstate08 "Loyalist in Chavez State" oppchavezstate08 "Opposition in Chavez State" misionfullmunmais "Misiones" misionfull "Misiones" _Itipo_doc_2 "Carta Agraria" _Itipo_doc_3 "Permanency Rights" _Itipo_doc_4 "Title Registration" patriotmais "\% Loyalists in Opposition State" opositormais "\% Opposition in Chavez State" lvoters "log(Voters)" chavezvote "\% Chavez Vote" abschavezmargin "Chavez Win Margin in Opposition State" abschavezmargin_chavezstate08 "Chavez Win Margin in Chavez State" chavezgov2008 "Chavez Governor Baseline" patchavezstate08 "\% Loyalists in Chavez State" oppchavezstate08 "\% Opposition in Opposition State" lruralvoters "log(Rural Voters)" lruralvoters_muni "log(Rural Voters)" lruralpop "log(Rural Population)" rural_pc_muni "Percent Rural" nbi "Poverty Rate") stats(N, labels("Observations") fmt(0 0 3))
